/ Acorn User: China / Acorn User China CD-ROM (UK) (Disc B) / Acorn User China CD-ROM (UK) (Disc B).bin / STUTTGART / FROMUTS / MONITOR / !Monitor_GenSWI

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1c f4 20 3e 20 | 3c 4d 6f 6e 69 74 6f 72 |..... > |<Monitor|
|00000010| 24 44 69 72 3e 2e 47 65 | 6e 53 57 49 0d 00 14 0f |$Dir>.Ge|nSWI....|
|00000020| de 20 74 61 62 25 20 34 | 30 39 36 0d 00 1e 0d f2 |. tab% 4|096.....|
|00000030| 61 73 73 65 6d 62 6c 65 | 0d 00 28 0f f2 6d 61 6b |assemble|..(..mak|
|00000040| 65 5f 74 61 62 6c 65 0d | 00 32 33 c8 99 20 22 4f |e_table.|.23.. "O|
|00000050| 53 5f 46 69 6c 65 22 2c | 31 30 2c 22 53 57 49 54 |S_File",|10,"SWIT|
|00000060| 61 62 6c 65 22 2c 26 46 | 46 44 2c 2c 74 61 62 25 |able",&F|FD,,tab%|
|00000070| 2c 74 61 62 25 2b 50 25 | 2b 34 0d 00 3c 05 e0 0d |,tab%+P%|+4..<...|
|00000080| 00 46 04 0d 00 50 0e dd | f2 61 73 73 65 6d 62 6c |.F...P..|.assembl|
|00000090| 65 0d 00 5a 14 e3 20 6f | 70 74 25 3d 34 20 b8 20 |e..Z.. o|pt%=4 . |
|000000a0| 36 20 88 20 32 0d 00 64 | 10 50 25 3d 30 3a 4f 25 |6 . 2..d|.P%=0:O%|
|000000b0| 3d 74 61 62 25 0d 00 6e | 0d 5b 4f 50 54 20 6f 70 |=tab%..n|.[OPT op|
|000000c0| 74 25 0d 00 78 1e 3b 20 | 57 6f 72 64 20 30 20 3d |t%..x.; |Word 0 =|
|000000d0| 20 6f 66 66 73 65 74 20 | 74 6f 20 74 61 62 6c 65 | offset |to table|
|000000e0| 0d 00 82 15 45 51 55 44 | 20 74 61 62 6c 65 5f 6f |....EQUD| table_o|
|000000f0| 66 66 73 65 74 0d 00 8c | 2c 3b 20 57 6f 72 64 20 |ffset...|,; Word |
|00000100| 31 2d 6e 20 3d 20 62 72 | 61 6e 63 68 65 73 20 74 |1-n = br|anches t|
|00000110| 6f 20 73 75 62 72 6f 75 | 74 69 6e 65 73 20 31 2d |o subrou|tines 1-|
|00000120| 6e 0d 00 96 0f 42 20 4f | 53 5f 57 72 69 74 65 53 |n....B O|S_WriteS|
|00000130| 0d 00 a0 04 0d 00 aa 12 | 3b 20 4e 6f 77 20 74 68 |........|; Now th|
|00000140| 65 20 63 6f 64 65 0d 00 | b4 0e 3b 20 4f 6e 20 65 |e code..|..; On e|
|00000150| 6e 74 72 79 0d 00 be 1b | 3b 20 52 30 2d 52 39 20 |ntry....|; R0-R9 |
|00000160| 3d 20 63 61 6c 6c 65 72 | 73 20 52 30 2d 52 39 0d |= caller|s R0-R9.|
|00000170| 00 c8 2b 3b 20 52 31 31 | 20 3d 20 72 65 6c 61 74 |..+; R11| = relat|
|00000180| 69 76 65 20 74 6f 20 61 | 62 73 6f 6c 75 74 65 20 |ive to a|bsolute |
|00000190| 64 69 66 66 65 72 65 6e | 63 65 0d 00 d2 25 3b 20 |differen|ce...%; |
|000001a0| 52 31 32 20 3d 20 72 65 | 74 75 72 6e 20 61 64 64 |R12 = re|turn add|
|000001b0| 72 65 73 73 20 28 61 62 | 73 6f 6c 75 74 65 29 0d |ress (ab|solute).|
|000001c0| 00 dc 38 3b 20 52 31 33 | 20 3d 20 65 78 65 63 75 |..8; R13| = execu|
|000001d0| 74 69 6e 67 20 70 72 6f | 67 72 61 6d 27 73 20 73 |ting pro|gram's s|
|000001e0| 74 61 63 6b 20 70 6f 69 | 6e 74 65 72 20 28 72 65 |tack poi|nter (re|
|000001f0| 6c 61 74 69 76 65 29 0d | 00 e6 40 3b 20 52 31 34 |lative).|..@; R14|
|00000200| 20 3d 20 70 72 6f 67 72 | 61 6d 20 63 6f 75 6e 74 | = progr|am count|
|00000210| 65 72 20 72 65 67 69 73 | 74 65 72 20 28 72 65 6c |er regis|ter (rel|
|00000220| 61 74 69 76 65 2c 20 2b | 38 20 66 6f 72 20 70 69 |ative, +|8 for pi|
|00000230| 70 65 6c 69 6e 65 29 0d | 00 f0 0d 3b 20 4f 6e 20 |peline).|...; On |
|00000240| 65 78 69 74 0d 00 fa 17 | 3b 20 52 30 2d 52 39 20 |exit....|; R0-R9 |
|00000250| 3d 20 6e 65 77 20 52 30 | 2d 52 39 0d 01 04 26 3b |= new R0|-R9...&;|
|00000260| 20 52 31 30 20 3d 20 6e | 65 77 20 50 43 2c 20 6f | R10 = n|ew PC, o|
|00000270| 72 20 2d 31 20 66 6f 72 | 20 6f 6c 64 20 50 43 2b |r -1 for| old PC+|
|00000280| 34 0d 01 0e 22 3b 20 53 | 74 61 74 75 73 20 3d 20 |4..."; S|tatus = |
|00000290| 6e 65 77 20 50 43 20 73 | 74 61 74 75 73 20 66 6c |new PC s|tatus fl|
|000002a0| 61 67 73 0d 01 18 3f 3b | 20 52 31 31 2d 52 31 34 |ags...?;| R11-R14|
|000002b0| 20 6d 61 79 20 62 65 20 | 63 6f 72 72 75 70 74 65 | may be |corrupte|
|000002c0| 64 2c 20 77 69 6c 6c 20 | 6e 6f 74 20 62 65 20 72 |d, will |not be r|
|000002d0| 65 74 75 72 6e 65 64 20 | 74 6f 20 70 72 6f 67 72 |eturned |to progr|
|000002e0| 61 6d 0d 01 22 04 0d 01 | 2c 0e 2e 4f 53 5f 57 72 |am.."...|,..OS_Wr|
|000002f0| 69 74 65 53 0d 01 36 0f | 53 54 52 20 52 30 2c 74 |iteS..6.|STR R0,t|
|00000300| 65 6d 70 0d 01 40 42 42 | 49 43 20 52 31 30 2c 52 |emp..@BB|IC R10,R|
|00000310| 31 34 2c 23 26 46 43 30 | 30 30 30 30 33 20 20 20 |14,#&FC0|00003   |
|00000320| 20 20 3b 20 67 65 74 20 | 72 65 6c 61 74 69 76 65 |  ; get |relative|
|00000330| 20 61 64 64 72 65 73 73 | 20 6f 66 20 53 57 49 20 | address| of SWI |
|00000340| 69 6e 73 74 72 0d 01 4a | 2f 41 44 44 20 52 31 30 |instr..J|/ADD R10|
|00000350| 2c 52 31 30 2c 52 31 31 | 20 20 20 20 20 20 20 20 |,R10,R11|        |
|00000360| 20 20 20 20 20 3b 20 6d | 61 6b 65 20 61 62 73 6f |     ; m|ake abso|
|00000370| 6c 75 74 65 0d 01 54 39 | 53 55 42 20 52 31 30 2c |lute..T9|SUB R10,|
|00000380| 52 31 30 2c 23 34 20 20 | 20 20 20 20 20 20 20 20 |R10,#4  |        |
|00000390| 20 20 20 20 3b 20 63 6f | 72 72 65 63 74 69 6f 6e |    ; co|rrection|
|000003a0| 20 66 6f 72 20 70 69 70 | 65 6c 69 6e 65 0d 01 5e | for pip|eline..^|
|000003b0| 0b 2e 77 72 69 74 65 53 | 0d 01 68 14 4c 44 52 42 |..writeS|..h.LDRB|
|000003c0| 20 52 30 2c 5b 52 31 30 | 5d 2c 23 31 0d 01 72 0d | R0,[R10|],#1..r.|
|000003d0| 43 4d 50 20 52 30 2c 23 | 30 0d 01 7c 15 53 57 49 |CMP R0,#|0..|.SWI|
|000003e0| 4e 45 20 22 4f 53 5f 57 | 72 69 74 65 43 22 0d 01 |NE "OS_W|riteC"..|
|000003f0| 86 0e 42 4e 45 20 77 72 | 69 74 65 53 0d 01 90 0f |..BNE wr|iteS....|
|00000400| 4c 44 52 20 52 30 2c 74 | 65 6d 70 0d 01 9a 13 53 |LDR R0,t|emp....S|
|00000410| 55 42 20 52 31 30 2c 52 | 31 30 2c 52 31 31 0d 01 |UB R10,R|10,R11..|
|00000420| a4 13 41 44 44 20 52 31 | 30 2c 52 31 30 2c 23 31 |..ADD R1|0,R10,#1|
|00000430| 31 0d 01 ae 12 42 49 43 | 20 52 31 30 2c 52 31 30 |1....BIC| R10,R10|
|00000440| 2c 23 33 0d 01 b8 0e 4d | 4f 56 20 50 43 2c 52 31 |,#3....M|OV PC,R1|
|00000450| 32 0d 01 c2 04 0d 01 cc | 09 2e 74 65 6d 70 0d 01 |2.......|..temp..|
|00000460| d6 0a 45 51 55 44 20 30 | 0d 01 e0 0a 45 51 55 44 |..EQUD 0|....EQUD|
|00000470| 20 30 0d 01 ea 0a 45 51 | 55 44 20 30 0d 01 f4 0a | 0....EQ|UD 0....|
|00000480| 45 51 55 44 20 30 0d 01 | fe 04 0d 02 08 25 3b 20 |EQUD 0..|.....%; |
|00000490| 41 6e 64 20 66 69 6e 61 | 6c 6c 79 20 74 68 65 20 |And fina|lly the |
|000004a0| 69 6e 74 65 72 63 65 70 | 74 20 74 61 62 6c 65 0d |intercep|t table.|
|000004b0| 02 12 11 2e 74 61 62 6c | 65 5f 6f 66 66 73 65 74 |....tabl|e_offset|
|000004c0| 0d 02 1c 05 5d 0d 02 26 | 05 ed 0d 02 30 05 e1 0d |....]..&|....0...|
|000004d0| 02 3a 04 0d 02 44 10 dd | f2 6d 61 6b 65 5f 74 61 |.:...D..|.make_ta|
|000004e0| 62 6c 65 0d 02 4e 2c ee | 20 85 20 c8 99 20 22 58 |ble..N,.| . .. "X|
|000004f0| 4f 53 5f 46 69 6e 64 22 | 2c 2c 43 25 3a f1 f6 24 |OS_Find"|,,C%:..$|
|00000500| 22 20 61 74 20 6c 69 6e | 65 20 22 3b 9e 3a e0 0d |" at lin|e ";.:..|
|00000510| 02 58 11 43 25 3d 8e 22 | 53 57 49 4c 69 73 74 22 |.X.C%=."|SWIList"|
|00000520| 0d 02 62 13 50 25 3d 74 | 61 62 6c 65 5f 6f 66 66 |..b.P%=t|able_off|
|00000530| 73 65 74 0d 02 6c 05 f5 | 0d 02 76 09 41 24 3d 22 |set..l..|..v.A$="|
|00000540| 22 0d 02 80 0f f5 20 41 | 24 2b 3d bd 9a 23 43 25 |"..... A|$+=..#C%|
|00000550| 0d 02 8a 20 fd 20 c5 23 | 43 25 20 84 20 c2 41 24 |... . .#|C% . .A$|
|00000560| 29 3d bd 31 30 20 84 20 | c2 41 24 29 3d bd 31 33 |)=.10 . |.A$)=.13|
|00000570| 0d 02 94 18 53 57 49 24 | 3d c0 41 24 2c a7 41 24 |....SWI$|=.A$,.A$|
|00000580| 2c 22 2c 22 29 2d 31 29 | 0d 02 9e 10 e7 20 53 57 |,",")-1)|..... SW|
|00000590| 49 24 3c 3e 41 24 20 8c | 0d 02 a8 2e c8 99 20 22 |I$<>A$ .|...... "|
|000005a0| 58 4f 53 5f 53 57 49 4e | 75 6d 62 65 72 46 72 6f |XOS_SWIN|umberFro|
|000005b0| 6d 53 74 72 69 6e 67 22 | 2c 2c 53 57 49 24 20 b8 |mString"|,,SWI$ .|
|000005c0| 20 4e 25 3b 46 25 0d 02 | b2 12 e7 20 28 46 25 20 | N%;F%..|... (F% |
|000005d0| 80 20 31 29 3d 30 20 8c | 0d 02 bc 0e 74 61 62 25 |. 1)=0 .|....tab%|
|000005e0| 21 50 25 3d 4e 25 0d 02 | c6 1c 52 45 47 24 3d c1 |!P%=N%..|..REG$=.|
|000005f0| 41 24 2c a7 41 24 2c 22 | 2c 22 29 2b 31 29 2b 22 |A$,.A$,"|,")+1)+"|
|00000600| 2c 22 0d 02 d0 0a 52 45 | 47 25 3d 30 0d 02 da 1d |,"....RE|G%=0....|
|00000610| f5 20 52 25 3d bb c0 52 | 45 47 24 2c a7 52 45 47 |. R%=..R|EG$,.REG|
|00000620| 24 2c 22 2c 22 29 2d 31 | 29 0d 02 e4 57 e7 20 52 |$,",")-1|)...W. R|
|00000630| 25 3c 2d 31 20 84 20 52 | 25 3e 31 34 20 8c 20 f1 |%<-1 . R|%>14 . .|
|00000640| 22 52 65 67 69 73 74 65 | 72 20 22 3b 52 25 22 20 |"Registe|r ";R%" |
|00000650| 6f 75 74 20 6f 66 20 72 | 61 6e 67 65 20 69 6e 20 |out of r|ange in |
|00000660| 53 57 49 20 3a 20 22 3b | 53 57 49 24 20 8b 20 52 |SWI : ";|SWI$ . R|
|00000670| 45 47 25 3d 52 45 47 25 | 20 84 20 31 3c 3c 52 25 |EG%=REG%| . 1<<R%|
|00000680| 0d 02 ee 1c 52 45 47 24 | 3d c1 52 45 47 24 2c a7 |....REG$|=.REG$,.|
|00000690| 52 45 47 24 2c 22 2c 22 | 29 2b 31 29 0d 02 f8 15 |REG$,","|)+1)....|
|000006a0| fd 20 52 45 47 24 3d 22 | 22 20 84 20 52 25 3d 2d |. REG$="|" . R%=-|
|000006b0| 31 0d 03 02 0d e7 20 52 | 25 3d 2d 31 20 8c 0d 03 |1..... R|%=-1 ...|
|000006c0| 0c 0e 52 45 47 25 3d bb | 52 45 47 24 0d 03 16 29 |..REG%=.|REG$...)|
|000006d0| f1 20 53 57 49 24 22 20 | 72 65 70 6c 61 63 65 64 |. SWI$" |replaced|
|000006e0| 20 62 79 20 73 75 62 72 | 6f 75 74 69 6e 65 20 22 | by subr|outine "|
|000006f0| 3b 52 45 47 25 0d 03 20 | 05 cc 0d 03 2a 0e f1 20 |;REG%.. |....*.. |
|00000700| 53 57 49 24 22 2c 22 3b | 0d 03 34 2e e3 20 54 25 |SWI$",";|..4.. T%|
|00000710| 3d 30 20 b8 20 31 34 3a | e7 20 28 52 45 47 25 20 |=0 . 14:|. (REG% |
|00000720| 80 20 31 3c 3c 54 25 29 | 3c 3e 30 20 8c 20 f1 3b |. 1<<T%)|<>0 . .;|
|00000730| 54 25 22 2c 22 3b 0d 03 | 3e 15 52 45 47 25 3d 52 |T%",";..|>.REG%=R|
|00000740| 45 47 25 20 84 20 31 3c | 3c 33 31 0d 03 48 05 ed |EG% . 1<|<31..H..|
|00000750| 0d 03 52 0f ef 20 31 32 | 37 2c 31 33 2c 31 30 0d |..R.. 12|7,13,10.|
|00000760| 03 5c 05 cd 0d 03 66 14 | 74 61 62 25 21 28 50 25 |.\....f.|tab%!(P%|
|00000770| 2b 34 29 3d 52 45 47 25 | 0d 03 70 09 50 25 2b 3d |+4)=REG%|..p.P%+=|
|00000780| 38 0d 03 7a 05 cc 0d 03 | 84 1a f1 22 55 6e 6b 6e |8..z....|..."Unkn|
|00000790| 6f 77 6e 20 53 57 49 20 | 3a 20 22 3b 53 57 49 24 |own SWI |: ";SWI$|
|000007a0| 0d 03 8e 05 cd 0d 03 98 | 05 cd 0d 03 a2 04 0d 03 |........|........|
|000007b0| ac 0a fd 20 c5 23 43 25 | 0d 03 b6 08 d9 23 43 25 |... .#C%|.....#C%|
|000007c0| 0d 03 c0 0e 74 61 62 25 | 21 50 25 3d 2d 31 0d 03 |....tab%|!P%=-1..|
|000007d0| ca 05 e1 0d 03 d4 04 0d | ff                      |........|.       |
+--------+-------------------------+-------------------------+--------+--------+